Sub ޸۲()

    Dim Ʈ As Worksheet
    Dim ޸ As Comment
    
    On Error Resume Next
    
    For Each Ʈ In ThisWorkbook.Worksheets
    
        For Each ޸ In Ʈ.Comments
        
            With ޸.Shape.TextFrame.Characters.Font
                .Name = "ٸ"
                .Size = 11
            End With
        
        Next ޸
    
    Next Ʈ

End Sub
